home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / comm / term / term34dRexx.lha / Maus_Gast.term < prev    next >
Text File  |  1993-04-01  |  2KB  |  78 lines
  1. /** $VER: Maus_Gast.term 1.0 (11.3.93)
  2.  **
  3.  ** Fuehrt einen Auto-Login in eine beliebige Maus durch.
  4.  **
  5.  ** Geschrieben von Olaf Thyssen
  6.  **       Internet: Olaf_Thyssen%kr.maus.de
  7.  **
  8.  ** Um dieses Programm zu verwenden, sollte man das
  9.  ** Telefonbuch oeffnen, den Telefonbucheintrag anwaehlen,
  10.  ** der dieses Programm benutzen soll, den Einstellungen
  11.  ** `Commands...' oeffnen und unter `Startup-/Login macro'
  12.  ** eintippen:
  13.  **
  14.  **    \a Maus_Gast
  15.  **
  16.  ** Nun bitte die `User/Password...' Einstellungen aendern,
  17.  ** sodass der zu verwendende Benutzername und das Benutzer-
  18.  ** kennwort korrekt eingetragen sind.
  19.  **
  20.  ** Jetzt die Telefonbuchdatei abspeichern und diese Datei
  21.  ** in die Schublade "REXX:" kopieren.
  22.  **/
  23.  
  24.         /* Die Wartezeit auf 50 Sekunden setzen. */
  25. TIMEOUT 50
  26.  
  27.  
  28.         /* Auf die Frage nach dem Benutzernamen warten. */
  29. WAIT 'Sind Sie eingetragener Benutzer'
  30.         /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  31. IF rc ~= 0 THEN EXIT
  32.         /* Eine Sekunde warten... */
  33. DELAY 1
  34.         /* Frage mit NEIN beantworten */
  35. SEND 'N'
  36.  
  37.  
  38. WAIT 'Wollen Sie sich jetzt als Benutzer eintragen'
  39.         /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  40. IF rc ~= 0 THEN EXIT
  41.         /* Eine Sekunde warten... */
  42. DELAY 1
  43.         /* Frage mit NEIN beantworten */
  44. SEND 'N'
  45.  
  46.  
  47.         /* der Info-Text wird zum 1. mal angehalten */
  48.         /* Auf die Aufforderung die Leertaste zu druecken warten. */
  49. WAIT 'Weiter mit Leertaste'
  50.         /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  51. IF rc ~= 0 THEN EXIT
  52.         /* Eine Sekunde warten... */
  53. DELAY 1
  54.         /* Den ASCII Wert 32 (SPACE) abschicken */
  55. SEND byte 32
  56.  
  57.  
  58.         /* der Info-Text wird zum 2. mal angehalten */
  59.         /* Auf die Aufforderung die Leertaste zu druecken warten. */
  60. WAIT 'Weiter mit Leertaste'
  61.         /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  62. IF rc ~= 0 THEN EXIT
  63.         /* Eine Sekunde warten... */
  64. DELAY 1
  65.         /* Den ASCII Wert 32 (SPACE) abschicken */
  66. SEND byte 32
  67.  
  68.  
  69.         /* der Info-Text wird zum 3. mal angehalten */
  70.         /* Auf die Aufforderung die Leertaste zu druecken warten. */
  71. WAIT 'Weiter mit Leertaste'
  72.         /* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
  73. IF rc ~= 0 THEN EXIT
  74.         /* Eine Sekunde warten... */
  75. DELAY 1
  76.         /* Den ASCII Wert 32 (SPACE) abschicken */
  77. SEND byte 32
  78.